Scripting > CxEditors > CxMssBlackoutEditor Object > CxMssBlackoutEditor Methods

CxMssBlackoutEditor Methods

The CxMssBlackoutEditor object contains the following methods:

Connect

The Connect method connects to a MSS.

Syntax

Connect(DomainSiteService As String)

Parameters

Parameter Required Description

DomainSiteService

Yes

The [Domain]Site.Service to which to connect.  A domain is optional. The service must be a valid MSS.

Example

The following example creates and connects the CxMssBlackoutEditor object.

Sub

Dim MssBlackoutEditor

Set MssBlackoutEditor = CreateObject("CxEditors.CxMssBlackoutEditor")

MssBlackoutEditor.Connect("[5410]CYGDEMO.MSS")

End Sub

Back to top

Copy

The Copy method launches a New Blackout property sheet initialized with the information in the specified record.

Syntax

Copy(QueueKey As String) As Integer

Parameters

Parameter Required Description

QueueKey

Yes

The database queue key of the record to copy.

Remarks

This method returns one of the following values:

  -1 or 0 An error occurred.
 

1

OK button was pressed.
  2 Cancel button was pressed.

Example

The following example launches a New Blackout property sheet for record "0000000012A0000001."

Sub

Dim iRet

iRet= MssBlackoutEditor.Copy("0000000012A0000001")

MsgBox iRet

End Sub

Back to top

Delete

This method is unimplemented.

Back to top

Disconnect

The Disconnect method disconnects from the connected MSS service.

Syntax

Disconnect()

Example

The following example disconnects the MssBlackoutEditor object.

Sub

MssBlackoutEditor.Disconnect

End Sub

Back to top

Edit

The Edit method launches a property sheet for the specified record.

Syntax

Edit(QueueKey As String) As Integer

Parameters

Parameter Required Description

QueueKey

Yes

The database queue key of the record to edit.

Remarks

This method returns one of the following values:

  -1 or 0 An error occurred.
 

1

OK button was pressed.
  2 Cancel button was pressed.

Example

The following example launches a property sheet for record "0000000012A0000001."

Sub

Dim iRet

iRet= MssBlackoutEditor.Edit("0000000012A0000001")

MsgBox iRet

End Sub

Back to top

New

The New method launches a New Blackout property sheet.

Syntax

New() As Integer

Remarks

This method returns one of the following values:

  -1 or 0 An error occurred.
 

1

OK button was pressed.
  2 Cancel button was pressed.

Example

The following example launches a New Blackout property sheet.

Sub

Dim iRet

iRet= MssBlackoutEditor.New

MsgBox iRet

End Sub

Back to top

Let us know how we can improve this topic.

CygNet at weatherford.com

© 2020 Weatherford. All rights reserved.